"OnAfterData" настан

"OnAfterData" настан

Овој настан е триггеран по пополнувањето на објектот со извештај со податоците од изворот на кој е поврзан. Користете го овој настан за пристап до вредноста на полето во базата на податоци или изразот содржан во објектот. Оваа вредност е поставена во системската променлива “Value” која е достапна само во овој настан. Така, ако два “Text” објекти содржат изразите [Table1.“Field1”] и [<Table2.“Field1”> + 10] вредностите на овие изрази можат да се користат со референцирање на променливата “Value” за објектите:

ако Value > 3000 тогаш

  Memo1.Color := clRed

што е поедноставно од пишување нешто како ова:

ако <Table1."Field1"> > 3000 тогаш

  Memo1.Color := clRed

Користењето на “Value” наместо израз овозможува да напишете еден мултифункционален обработувач за настанот “OnAfterData” кој може да биде поврзан со неколку објекти.

Ве молиме забележете нешто друго - ако објектот содржи неколку изрази (на пример '[expr1] [expr2]') вредноста на последниот израз се пренесува во променливата “Value”.

Настанот “OnAfterData” е идеален за пресметување на висината и ширината на објектите како “Text”. Тоа значи, ако е потребна точната висина на истегнатиот “Text” објект кој содржи израз во скрипт, можете да го користите овој код во настанот “OnAfterData”:

вар

  MemoHeight: Extended;                                                        

почеток

  MemoHeight := TfrxMemoView(Sender).CalcHeight;                                    

крај;

Ако овој код се користеше во настанот “OnBeforePrint” резултатот ќе биде висината на објектот кој содржи израз пред изразот да биде оценет, а не неговата актуелна вредност при печатење.